home *** CD-ROM | disk | FTP | other *** search
/ Great Canadian Scientists / GCS_CD.iso / mac / PC / GCSData / memory_g.dxr / 00044_Leave Help Script.ls < prev    next >
Encoding:
Text File  |  1996-09-01  |  577 b   |  27 lines

  1. on LeaveHelp
  2.   global HelpMode, HelpTime, TimeStart, stage, timer
  3.   if HelpMode = 1 then
  4.     set the visible of sprite 31 to 1
  5.     go(2)
  6.   end if
  7.   if HelpMode = 0 then
  8.     set the visible of sprite 31 to 0
  9.     set the visible of sprite 13 to 1
  10.     set the visible of sprite 4 to 1
  11.     set the visible of sprite 5 to 1
  12.     if stage = 0 then
  13.       go(3)
  14.     end if
  15.     if stage = 1 then
  16.       go(6)
  17.     end if
  18.     if stage = 2 then
  19.       go(8)
  20.     end if
  21.     set TimeStart to TimeStart - (the ticks - HelpTime)
  22.     set timer to 1
  23.   end if
  24.   ClearTrackScripts()
  25.   cursor(-1)
  26. end
  27.